program simpleexpressionTest;
 var a, b : integer;
        c : real;
 begin
   a := 3;
   b := 4 + 5;
   c := 6 * 7;
   d := (8 + 2)/ 2;
 end.
